home *** CD-ROM | disk | FTP | other *** search
| Unknown | 1991-06-02 | 10.8 KB |
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was not able to be converted.
This format is not currently supported by dexvert.
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 100%
| file
| data
| default
| |
| 100%
| xdgMime
| image/x-tga
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 0d f4 20 3e 53 | 6f 75 72 63 65 0d 00 14 |..... >S|ource...|
|00000010| 05 f4 0d 00 1e 07 eb 31 | 35 0d 00 28 13 de 20 63 |.......1|5..(.. c|
|00000020| 6f 64 65 20 32 36 30 2a | 31 30 32 34 0d 00 32 0e |ode 260*|1024..2.|
|00000030| f2 63 6f 6e 73 74 61 6e | 74 73 0d 00 3c 0d f2 61 |.constan|ts..<..a|
|00000040| 73 73 65 6d 62 6c 65 0d | 00 46 0a d6 20 63 6f 64 |ssemble.|.F.. cod|
|00000050| 65 0d 00 50 05 e0 0d 00 | 5a 05 3a 0d 00 64 0f dd |e..P....|Z.:..d..|
|00000060| f2 63 6f 6e 73 74 61 6e | 74 73 0d 00 6e 0f 63 68 |.constan|ts..n.ch|
|00000070| 6d 6f 64 65 3d 26 31 31 | 36 0d 00 78 0f 6d 6f 64 |mode=&11|6..x.mod|
|00000080| 65 31 35 3d 26 31 30 46 | 0d 00 82 0f 6d 6f 64 65 |e15=&10F|....mode|
|00000090| 31 33 3d 26 31 30 44 0d | 00 8c 04 0d 00 96 0a 73 |13=&10D.|.......s|
|000000a0| 6f 66 66 3d 33 0d 00 a0 | 22 68 65 69 67 68 74 3d |off=3...|"height=|
|000000b0| 34 20 20 20 20 20 3a f4 | 20 64 65 6d 6f 20 72 65 |4 :.| demo re|
|000000c0| 67 20 6e 61 6d 65 73 0d | 00 aa 08 66 70 3d 35 0d |g names.|...fp=5.|
|000000d0| 00 b4 0b 66 77 6f 72 6b | 3d 36 0d 00 be 08 74 70 |...fwork|=6....tp|
|000000e0| 3d 37 0d 00 c8 0a 63 68 | 61 72 3d 38 0d 00 d2 0a |=7....ch|ar=8....|
|000000f0| 77 6f 72 6b 3d 39 0d 00 | dc 09 79 70 3d 31 30 0d |work=9..|..yp=10.|
|00000100| 00 e6 11 78 70 3d 31 31 | 3a 73 6e 75 6d 3d 31 31 |...xp=11|:snum=11|
|00000110| 0d 00 f0 0a 73 63 72 3d | 31 32 0d 00 fa 09 73 70 |....scr=|12....sp|
|00000120| 3d 31 33 0d 01 04 0b 6c | 69 6e 6b 3d 31 34 0d 01 |=13....l|ink=14..|
|00000130| 0e 05 e1 0d 01 18 05 3a | 0d 01 22 0e dd f2 61 73 |.......:|.."...as|
|00000140| 73 65 6d 62 6c 65 0d 01 | 2c 14 e3 20 70 61 73 73 |semble..|,.. pass|
|00000150| 3d 30 20 b8 20 32 20 88 | 20 32 0d 01 36 0b 50 25 |=0 . 2 .| 2..6.P%|
|00000160| 3d 63 6f 64 65 0d 01 40 | 0d 5b 4f 50 54 20 70 61 |=code..@|.[OPT pa|
|00000170| 73 73 0d 01 4a 09 2e 69 | 6e 69 74 0d 01 54 45 3b |ss..J..i|nit..TE;|
|00000180| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000190| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000001a0| 2a 20 20 3c 2d 2d 2d 2d | 20 20 65 6e 74 72 79 20 |* <----| entry |
|000001b0| 70 6f 69 6e 74 20 66 6f | 72 20 4c 6f 61 64 65 72 |point fo|r Loader|
|000001c0| 0d 01 5e 1d 41 44 52 20 | 20 20 20 20 20 20 73 70 |..^.ADR | sp|
|000001d0| 2c 20 20 20 20 20 20 20 | 73 74 61 63 6b 0d 01 68 |, |stack..h|
|000001e0| 27 41 44 44 20 20 20 20 | 20 20 20 73 70 2c 20 20 |'ADD | sp, |
|000001f0| 20 20 20 20 20 73 70 2c | 20 20 20 20 20 20 20 23 | sp,| #|
|00000200| 34 30 39 36 0d 01 72 38 | 3b 20 74 68 69 73 20 63 |4096..r8|; this c|
|00000210| 6f 64 65 20 73 65 74 73 | 20 75 70 20 6f 75 72 20 |ode sets| up our |
|00000220| 6f 77 6e 20 73 74 61 63 | 6b 20 2d 20 79 6f 75 20 |own stac|k - you |
|00000230| 6f 6e 6c 79 20 6e 65 65 | 64 20 69 74 0d 01 7c 26 |only nee|d it..|&|
|00000240| 3b 20 69 66 20 72 75 6e | 6e 69 6e 67 20 66 72 6f |; if run|ning fro|
|00000250| 6d 20 43 4c 49 20 2f 20 | 73 75 70 65 72 76 69 73 |m CLI / |supervis|
|00000260| 6f 72 0d 01 86 04 0d 01 | 90 1e 73 74 6d 66 64 20 |or......|..stmfd |
|00000270| 20 20 20 20 28 73 70 29 | 21 2c 20 20 20 20 7b 6c | (sp)|!, {l|
|00000280| 69 6e 6b 7d 0d 01 9a 04 | 0d 01 a4 45 41 44 52 20 |ink}....|...EADR |
|00000290| 20 20 20 20 20 20 52 30 | 2c 20 20 20 20 20 20 20 | R0|, |
|000002a0| 73 63 72 73 74 61 72 74 | 20 20 20 20 20 20 20 20 |scrstart| |
|000002b0| 20 20 20 20 3b 72 65 61 | 64 20 73 63 72 65 65 6e | ;rea|d screen|
|000002c0| 20 62 61 73 65 20 61 64 | 64 72 65 73 73 0d 01 ae | base ad|dress...|
|000002d0| 3e 41 44 44 20 20 20 20 | 20 20 20 52 31 2c 20 20 |>ADD | R1, |
|000002e0| 20 20 20 20 20 52 30 2c | 20 20 20 20 20 20 20 23 | R0,| #|
|000002f0| 38 20 20 20 20 20 20 20 | 20 3b 61 6e 64 20 70 75 |8 | ;and pu|
|00000300| 74 20 69 74 20 69 6e 20 | 72 31 32 0d 01 b8 23 53 |t it in |r12...#S|
|00000310| 57 49 20 20 20 20 20 20 | 20 22 4f 53 5f 52 65 61 |WI | "OS_Rea|
|00000320| 64 56 64 75 56 61 72 69 | 61 62 6c 65 73 22 0d 01 |dVduVari|ables"..|
|00000330| c2 1c 4c 44 52 20 20 20 | 20 20 20 20 52 31 32 2c |..LDR | R12,|
|00000340| 20 20 20 20 20 20 5b 52 | 31 5d 0d 01 cc 04 0d 01 | [R|1]......|
|00000350| d6 3b 53 57 49 20 20 20 | 20 20 20 20 63 68 6d 6f |.;SWI | chmo|
|00000360| 64 65 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |de | |
|00000370| 20 20 20 20 20 20 20 20 | 20 20 3b 6d 6f 64 65 20 | | ;mode |
|00000380| 31 33 20 76 69 61 20 31 | 35 0d 01 e0 3d 53 57 49 |13 via 1|5...=SWI|
|00000390| 20 20 20 20 20 20 20 6d | 6f 64 65 31 35 20 20 20 | m|ode15 |
|000003a0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000003b0| 20 20 20 20 20 3b 74 6f | 20 63 68 65 63 6b 20 69 | ;to| check i|
|000003c0| 66 20 31 36 30 6b 0d 01 | ea 3d 53 57 49 20 20 20 |f 160k..|.=SWI |
|000003d0| 20 20 20 20 63 68 6d 6f | 64 65 20 20 20 20 20 20 | chmo|de |
|000003e0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000003f0| 20 20 3b 6f 66 20 73 63 | 72 65 65 6e 20 6d 65 6d | ;of sc|reen mem|
|00000400| 6f 72 79 0d 01 f4 34 53 | 57 49 20 20 20 20 20 20 |ory...4S|WI |
|00000410| 20 6d 6f 64 65 31 33 20 | 20 20 20 20 20 20 20 20 | mode13 | |
|00000420| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 3b | | ;|
|00000430| 69 73 20 66 72 65 65 0d | 01 fe 04 0d 02 08 39 53 |is free.|......9S|
|00000440| 57 49 20 20 20 20 20 20 | 20 22 4f 53 5f 52 65 6d |WI | "OS_Rem|
|00000450| 6f 76 65 43 75 72 73 6f | 72 73 22 20 20 20 20 20 |oveCurso|rs" |
|00000460| 20 20 20 20 20 20 20 3b | 6b 69 6c 6c 20 63 75 72 | ;|kill cur|
|00000470| 73 6f 72 73 0d 02 12 1a | 4d 4f 56 20 20 20 20 20 |sors....|MOV |
|00000480| 20 20 52 30 2c 20 20 20 | 20 20 20 20 23 34 0d 02 | R0, | #4..|
|00000490| 1c 1a 4d 4f 56 20 20 20 | 20 20 20 20 52 30 2c 20 |..MOV | R0, |
|000004a0| 20 20 20 20 20 20 23 32 | 0d 02 26 17 53 57 49 20 | #2|..&.SWI |
|000004b0| 20 20 20 20 20 20 22 4f | 53 5f 42 79 74 65 22 0d | "O|S_Byte".|
|000004c0| 02 30 04 0d 02 3a 40 42 | 20 20 20 20 20 20 20 20 |.0...:@B| |
|000004d0| 20 64 75 5f 6f 75 72 5f | 73 74 75 66 66 20 20 20 | du_our_|stuff |
|000004e0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 3b | | ;|
|000004f0| 67 6f 20 74 6f 20 74 68 | 65 20 6d 61 69 6e 20 64 |go to th|e main d|
|00000500| 65 6d 6f 0d 02 44 04 0d | 02 4e 0d 2e 73 63 72 73 |emo..D..|.N..scrs|
|00000510| 74 61 72 74 0d 02 58 22 | 45 51 55 44 20 31 34 39 |tart..X"|EQUD 149|
|00000520| 3a 45 51 55 44 20 2d 31 | 3a 45 51 55 44 20 30 3a |:EQUD -1|:EQUD 0:|
|00000530| 45 51 55 44 20 30 0d 02 | 62 04 0d 02 6c 48 2e 73 |EQUD 0..|b...lH.s|
|00000540| 74 61 63 6b 20 20 20 20 | 20 20 20 20 20 20 20 20 |tack | |
|00000550| 20 20 20 20 20 20 20 20 | 20 20 20 20 3b 6f 75 72 | | ;our|
|00000560| 20 73 74 61 63 6b 20 77 | 68 69 63 68 20 69 73 20 | stack w|hich is |
|00000570| ac 20 74 6f 20 62 65 20 | 63 6f 72 72 75 70 74 65 |. to be |corrupte|
|00000580| 64 21 0d 02 76 0d 5d 50 | 25 2b 3d 34 31 32 38 0d |d!..v.]P|%+=4128.|
|00000590| 02 80 0d 5b 4f 50 54 20 | 70 61 73 73 0d 02 8a 04 |...[OPT |pass....|
|000005a0| 0d 02 94 11 2e 63 6f 75 | 6e 74 20 45 51 55 44 20 |.....cou|nt EQUD |
|000005b0| 30 0d 02 9e 04 0d 02 a8 | 19 2e 73 63 72 61 64 64 |0.......|..scradd|
|000005c0| 72 20 20 45 51 55 44 20 | 20 20 20 20 20 30 0d 02 |r EQUD | 0..|
|000005d0| b2 19 2e 73 63 72 65 65 | 6e 20 20 20 45 51 55 44 |...scree|n EQUD|
|000005e0| 20 20 20 20 20 20 31 0d | 02 bc 04 0d 02 c6 11 2e | 1.|........|
|000005f0| 64 75 5f 6f 75 72 5f 73 | 74 75 66 66 0d 02 d0 04 |du_our_s|tuff....|
|00000600| 0d 02 da 3a 3b 52 31 31 | 20 2d 20 73 6e 75 6d 20 |...:;R11| - snum |
|00000610| 2d 20 73 63 72 65 65 6e | 20 6e 75 6d 62 65 72 20 |- screen| number |
|00000620| 63 75 72 72 65 6e 74 6c | 79 20 62 65 69 6e 67 20 |currentl|y being |
|00000630| 77 72 69 74 74 65 6e 20 | 74 6f 0d 02 e4 2d 3b 52 |written |to...-;R|
|00000640| 31 32 20 2d 20 73 63 72 | 20 20 2d 20 70 6f 69 6e |12 - scr| - poin|
|00000650| 74 73 20 74 6f 20 62 61 | 73 65 20 6f 66 20 73 63 |ts to ba|se of sc|
|00000660| 72 65 65 6e 20 23 31 0d | 02 ee 35 3b 52 31 33 20 |reen #1.|..5;R13 |
|00000670| 2d 20 73 70 20 20 20 2d | 20 70 6f 69 6e 74 73 20 |- sp -| points |
|00000680| 74 6f 20 63 75 72 72 65 | 6e 74 20 70 6f 73 69 74 |to curre|nt posit|
|00000690| 69 6f 6e 20 69 6e 20 73 | 74 61 63 6b 0d 02 f8 39 |ion in s|tack...9|
|000006a0| 3b 52 31 34 20 2d 20 6c | 69 6e 6b 20 2d 20 70 6f |;R14 - l|ink - po|
|000006b0| 69 6e 74 73 20 74 6f 20 | 72 65 2d 65 6e 74 72 79 |ints to |re-entry|
|000006c0| 20 70 6f 69 6e 74 20 6f | 66 20 73 75 62 72 6f 75 | point o|f subrou|
|000006d0| 74 69 6e 65 73 0d 03 02 | 04 0d 03 0c 26 3b 6e 6f |tines...|....&;no|
|000006e0| 6e 65 20 6f 66 20 74 68 | 65 73 65 20 73 68 6f 75 |ne of th|ese shou|
|000006f0| 6c 64 20 62 65 20 63 6f | 72 72 75 70 74 65 64 0d |ld be co|rrupted.|
|00000700| 03 16 04 0d 03 20 1a 4d | 4f 56 20 20 20 20 20 20 |..... .M|OV |
|00000710| 20 73 6e 75 6d 2c 20 20 | 20 20 20 23 31 0d 03 2a | snum, | #1..*|
|00000720| 04 0d 03 34 0d 2e 64 65 | 6d 6f 6c 6f 6f 70 0d 03 |...4..de|moloop..|
|00000730| 3e 35 4c 44 52 20 20 20 | 20 20 20 20 73 6e 75 6d |>5LDR | snum|
|00000740| 2c 20 20 20 20 20 73 63 | 72 65 65 6e 20 20 20 20 |, sc|reen |
|00000750| 3b 6c 6f 61 64 20 73 63 | 72 65 65 6e 20 6e 75 6d |;load sc|reen num|
|00000760| 62 65 72 0d 03 48 04 0d | 03 52 35 53 54 4d 46 44 |ber..H..|.R5STMFD|
|00000770| 20 20 20 20 20 28 73 70 | 29 21 2c 20 20 20 20 7b | (sp|)!, {|
|00000780| 73 63 72 7d 20 20 20 20 | 20 3b 73 74 6f 72 65 20 |scr} | ;store |
|00000790| 62 61 73 65 20 61 64 64 | 72 65 73 73 0d 03 5c 45 |base add|ress..\E|
|000007a0| 43 4d 50 20 20 20 20 20 | 20 20 73 6e 75 6d 2c 20 |CMP | snum, |
|000007b0| 20 20 20 20 23 32 20 20 | 20 20 20 20 20 20 3b 61 | #2 | ;a|
|000007c0| 6e 64 20 61 64 6a 75 73 | 74 20 69 74 20 66 6f 72 |nd adjus|t it for|
|000007d0| 20 63 75 72 72 65 6e 74 | 20 62 61 6e 6b 20 6e 6f | current| bank no|
|000007e0| 2e 0d 03 66 28 41 44 44 | 45 51 20 20 20 20 20 73 |...f(ADD|EQ s|
|000007f0| 63 72 2c 20 20 20 20 20 | 20 73 63 72 2c 20 20 20 |cr, | scr, |
|00000800| 20 20 20 23 38 31 39 32 | 30 0d 03 70 04 0d 03 7a | #8192|0..p...z|
|00000810| 36 42 4c 20 20 20 20 20 | 20 20 20 63 6c 72 73 63 |6BL | clrsc|
|00000820| 72 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 3b |r | ;|
|00000830| 61 6c 6c 20 6f 75 72 20 | 73 75 62 72 6f 75 74 69 |all our |subrouti|
|00000840| 6e 65 73 0d 03 84 2d 42 | 4c 20 20 20 20 20 20 20 |nes...-B|L |
|00000850| 20 73 63 72 6f 6c 6c 74 | 65 78 74 20 20 20 20 20 | scrollt|ext |
|00000860| 20 20 20 20 20 3b 6e 6f | 74 20 6d 61 73 6b 65 64 | ;no|t masked|
|00000870| 0d 03 8e 29 42 4c 20 20 | 20 20 20 20 20 20 73 74 |...)BL | st|
|00000880| 61 72 73 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |ars | |
|00000890| 20 20 3b 6d 61 73 6b 65 | 64 0d 03 98 2d 42 4c 20 | ;maske|d...-BL |
|000008a0| 20 20 20 20 20 20 20 72 | 65 66 6c 65 63 74 69 6f | r|eflectio|
|000008b0| 6e 20 20 20 20 20 20 20 | 20 20 20 3b 6e 6f 74 20 |n | ;not |
|000008c0| 6d 61 73 6b 65 64 0d 03 | a2 04 0d 03 ac 3d 4c 44 |masked..|.....=LD|
|000008d0| 4d 46 44 20 20 20 20 20 | 28 73 70 29 21 2c 20 20 |MFD |(sp)!, |
|000008e0| 20 20 7b 73 63 72 7d 20 | 20 20 20 20 3b 72 65 6c | {scr} | ;rel|
|000008f0| 6f 61 64 20 73 63 72 65 | 65 6e 20 62 61 73 65 20 |oad scre|en base |
|00000900| 61 64 64 72 65 73 73 0d | 03 b6 04 0d 03 c0 33 4d |address.|......3M|
|00000910| 4f 56 20 20 20 20 20 20 | 20 52 30 2c 20 20 20 20 |OV | R0, |
|00000920| 20 20 20 23 31 39 20 20 | 20 20 20 20 20 3b 77 61 | #19 | ;wa|
|00000930| 69 74 20 66 6f 72 20 66 | 6c 79 62 61 63 6b 0d 03 |it for f|lyback..|
|00000940| ca 17 53 57 49 20 20 20 | 20 20 20 20 22 4f 53 5f |..SWI | "OS_|
|00000950| 42 79 74 65 22 0d 03 d4 | 04 0d 03 de 39 4c 44 52 |Byte"...|....9LDR|
|00000960| 20 20 20 20 20 20 20 73 | 6e 75 6d 2c 20 20 20 20 | s|num, |
|00000970| 20 73 63 72 65 65 6e 20 | 20 20 20 3b 64 69 73 70 | screen | ;disp|
|00000980| 6c 61 79 20 75 70 64 61 | 74 65 64 20 73 63 72 65 |lay upda|ted scre|
|00000990| 65 6e 0d 03 e8 1c 4d 4f | 56 20 20 20 20 20 20 20 |en....MO|V |
|000009a0| 52 30 2c 20 20 20 20 20 | 20 20 23 31 31 33 0d 03 |R0, | #113..|
|000009b0| f2 1b 4d 4f 56 20 20 20 | 20 20 20 20 52 31 2c 20 |..MOV | R1, |
|000009c0| 20 20 20 20 20 20 52 31 | 31 0d 03 fc 17 53 57 49 | R1|1....SWI|
|000009d0| 20 20 20 20 20 20 20 22 | 4f 53 5f 42 79 74 65 22 | "|OS_Byte"|
|000009e0| 0d 04 06 04 0d 04 10 46 | 4c 44 52 20 20 20 20 20 |.......F|LDR |
|000009f0| 20 20 73 6e 75 6d 2c 20 | 20 20 20 20 73 63 72 65 | snum, | scre|
|00000a00| 65 6e 20 20 20 20 3b 63 | 68 61 6e 67 65 20 62 61 |en ;c|hange ba|
|00000a10| 6e 6b 20 6e 6f 2e 20 74 | 6f 20 75 70 64 61 74 65 |nk no. t|o update|
|00000a20| 20 6e 65 78 74 20 74 69 | 6d 65 0d 04 1a 22 82 20 | next ti|me...". |
|00000a30| 20 20 20 20 20 20 52 31 | 31 2c 20 20 20 20 20 20 | R1|1, |
|00000a40| 52 31 31 2c 20 20 20 20 | 20 20 23 33 0d 04 24 1e |R11, | #3..$.|
|00000a50| 53 54 52 20 20 20 20 20 | 20 20 73 6e 75 6d 2c 20 |STR | snum, |
|00000a60| 20 20 20 20 73 63 72 65 | 65 6e 0d 04 2e 04 0d 04 | scre|en......|
|00000a70| 38 3d 53 57 49 20 20 20 | 20 20 20 20 22 4f 53 5f |8=SWI | "OS_|
|00000a80| 52 65 61 64 45 73 63 61 | 70 65 53 74 61 74 65 22 |ReadEsca|peState"|
|00000a90| 20 20 20 20 20 20 20 20 | 20 20 3b 65 73 63 61 70 | | ;escap|
|00000aa0| 65 20 70 72 65 73 73 65 | 64 20 3f 0d 04 42 34 42 |e presse|d ?..B4B|
|00000ab0| 43 43 20 20 20 20 20 20 | 20 64 65 6d 6f 6c 6f 6f |CC | demoloo|
|00000ac0| 70 20 20 20 20 20 20 20 | 20 20 20 20 20 3b 6e 6f |p | ;no|
|00000ad0| 2c 20 74 68 65 6e 20 63 | 61 72 72 79 20 6f 6e 0d |, then c|arry on.|
|00000ae0| 04 4c 04 0d 04 56 2b 2e | 65 78 69 74 64 65 6d 6f |.L...V+.|exitdemo|
|00000af0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000b00| 20 20 20 20 20 3b 65 6c | 73 65 20 65 6e 64 0d 04 | ;el|se end..|
|00000b10| 60 04 0d 04 6a 38 4d 4f | 56 20 20 20 20 20 20 20 |`...j8MO|V |
|00000b20| 52 30 2c 20 20 20 20 20 | 20 20 23 31 31 33 20 20 |R0, | #113 |
|00000b30| 20 20 20 20 3b 64 69 73 | 70 6c 61 79 20 73 63 72 | ;dis|play scr|
|00000b40| 65 65 6e 20 62 61 6e 6b | 20 31 0d 04 74 1a 4d 4f |een bank| 1..t.MO|
|00000b50| 56 20 20 20 20 20 20 20 | 52 31 2c 20 20 20 20 20 |V |R1, |
|00000b60| 20 20 23 31 0d 04 7e 17 | 53 57 49 20 20 20 20 20 | #1..~.|SWI |
|00000b70| 20 20 22 4f 53 5f 42 79 | 74 65 22 0d 04 88 04 0d | "OS_By|te".....|
|00000b80| 04 92 4e 41 44 52 20 20 | 20 20 20 20 20 52 30 2c |..NADR | R0,|
|00000b90| 20 20 20 20 20 20 20 65 | 78 69 74 62 6c 6f 63 6b | e|xitblock|
|00000ba0| 20 3b 74 68 69 73 20 63 | 6f 64 65 20 64 6f 65 73 | ;this c|ode does|
|00000bb0| 20 61 20 53 75 70 65 72 | 76 69 73 6f 72 20 63 6f | a Super|visor co|
|00000bc0| 6d 70 61 74 69 62 6c 65 | 20 65 78 69 74 0d 04 9c |mpatible| exit...|
|00000bd0| 17 53 57 49 20 20 20 20 | 20 20 20 22 4f 53 5f 45 |.SWI | "OS_E|
|00000be0| 78 69 74 22 0d 04 a6 04 | 0d 04 b0 20 2e 65 78 69 |xit"....|... .exi|
|00000bf0| 74 62 6c 6f 63 6b 20 20 | 3b 66 6f 72 20 53 57 49 |tblock |;for SWI|
|00000c00| 20 4f 53 5f 45 78 69 74 | 0d 04 ba 0e 45 51 55 44 | OS_Exit|....EQUD|
|00000c10| 20 26 31 32 33 34 0d 04 | c4 cd 45 51 55 53 20 22 | &1234..|..EQUS "|
|00000c20| 49 20 77 6f 6e 27 74 20 | 62 65 20 74 68 65 20 6f |I won't |be the o|
|00000c30| 6e 65 20 6c 65 66 74 20 | 62 65 68 69 6e 64 2c 20 |ne left |behind, |
|00000c40| 79 6f 75 20 63 61 6e 27 | 74 20 62 65 20 6b 69 6e |you can'|t be kin|
|00000c50| 67 20 6f 66 20 74 68 65 | 20 77 6f 72 6c 64 20 77 |g of the| world w|
|00000c60| 68 65 6e 20 79 6f 75 27 | 72 65 20 61 20 73 6c 61 |hen you'|re a sla|
|00000c70| 76 65 20 74 6f 20 74 68 | 65 20 67 72 69 6e 64 2e |ve to th|e grind.|
|00000c80| 20 20 54 65 61 72 20 64 | 6f 77 6e 20 74 68 65 20 | Tear d|own the |
|00000c90| 72 61 74 20 72 61 63 69 | 61 6c 20 73 6c 69 6d 65 |rat raci|al slime|
|00000ca0| 2c 20 79 6f 75 20 63 61 | 6e 27 74 20 62 65 20 6b |, you ca|n't be k|
|00000cb0| 69 6e 67 20 6f 66 20 74 | 68 65 20 77 6f 72 6c 64 |ing of t|he world|
|00000cc0| 20 77 68 65 6e 20 79 6f | 75 27 72 65 20 61 20 73 | when yo|u're a s|
|00000cd0| 6c 61 76 65 20 74 6f 20 | 74 68 65 20 67 72 69 6e |lave to |the grin|
|00000ce0| 64 2e 22 0d 04 ce 0a 45 | 51 55 42 20 30 0d 04 d8 |d."....E|QUB 0...|
|00000cf0| 09 41 4c 49 47 4e 0d 04 | e2 04 0d 04 ec 04 0d 04 |.ALIGN..|........|
|00000d00| f6 3d 2e 72 65 66 6c 65 | 63 74 69 6f 6e 20 20 20 |.=.refle|ction |
|00000d10| 20 20 20 20 20 20 3b 61 | 20 62 6c 61 63 6b 20 70 | ;a| black p|
|00000d20| 65 72 66 65 63 74 6c 79 | 20 72 65 66 6c 65 63 74 |erfectly| reflect|
|00000d30| 69 76 65 20 73 75 72 66 | 61 63 65 0d 05 00 24 73 |ive surf|ace...$s|
|00000d40| 74 6d 66 64 20 20 20 20 | 20 28 73 70 29 21 2c 20 |tmfd | (sp)!, |
|00000d50| 20 20 20 7b 72 30 2d 72 | 31 32 2c 72 31 34 7d 0d | {r0-r|12,r14}.|
|00000d60| 05 0a 2a 61 64 64 20 20 | 20 20 20 20 20 72 31 32 |..*add | r12|
|00000d70| 2c 20 20 20 20 20 20 72 | 31 32 2c 20 20 20 20 20 |, r|12, |
|00000d80| 20 23 31 36 38 2a 33 32 | 30 0d 05 14 26 73 75 62 | #168*32|0...&sub|
|00000d90| 73 20 20 20 20 20 20 72 | 31 32 2c 20 20 20 20 20 |s r|12, |
|00000da0| 20 72 31 32 2c 20 20 20 | 20 20 20 23 33 32 30 0d | r12, | #320.|
|00000db0| 05 1e 1b 6d 6f 76 20 20 | 20 20 20 20 20 72 31 34 |...mov | r14|
|00000dc0| 2c 20 20 20 20 20 20 72 | 31 32 0d 05 28 1b 6d 6f |, r|12..(.mo|
|00000dd0| 76 20 20 20 20 20 20 20 | 72 31 31 2c 20 20 20 20 |v |r11, |
|00000de0| 20 20 23 34 30 0d 05 32 | 04 0d 05 3c 4b 3b 62 61 | #40..2|...<K;ba|
|00000df0| 73 69 63 61 6c 6c 79 20 | 77 65 20 73 74 61 72 74 |sically |we start|
|00000e00| 20 74 77 6f 20 70 6f 69 | 6e 74 65 72 73 20 6f 66 | two poi|nters of|
|00000e10| 66 20 61 74 20 74 68 65 | 20 62 6f 75 6e 64 61 72 |f at the| boundar|
|00000e20| 79 20 62 65 74 77 65 65 | 6e 20 72 65 66 6c 65 63 |y betwee|n reflec|
|00000e30| 74 69 6f 6e 0d 05 46 4b | 3b 61 6e 64 20 74 68 65 |tion..FK|;and the|
|00000e40| 20 74 6f 70 20 68 61 6c | 66 20 6f 66 20 74 68 65 | top hal|f of the|
|00000e50| 20 73 63 72 65 65 6e 2e | 20 20 54 68 65 6e 20 6c | screen.| Then l|
|00000e60| 6f 61 64 20 61 20 6c 69 | 6e 65 20 6f 66 20 64 61 |oad a li|ne of da|
|00000e70| 74 61 20 66 72 6f 6d 20 | 74 68 65 20 74 6f 70 0d |ta from |the top.|
|00000e80| 05 50 48 3b 73 74 6f 72 | 65 20 69 74 20 69 6e 20 |.PH;stor|e it in |
|00000e90| 74 68 65 20 72 65 66 6c | 65 63 74 69 6f 6e 20 61 |the refl|ection a|
|00000ea0| 6e 64 20 6d 6f 76 65 20 | 74 68 65 20 6c 69 6e 65 |nd move |the line|
|00000eb0| 73 20 61 77 61 79 20 66 | 72 6f 6d 20 65 61 63 68 |s away f|rom each|
|00000ec0| 20 6f 74 68 65 72 2e 0d | 05 5a 49 3b 74 68 65 20 | other..|.ZI;the |
|00000ed0| 74 6f 70 20 70 6f 69 6e | 74 65 72 20 6d 6f 76 65 |top poin|ter move|
|00000ee0| 73 20 69 6e 20 73 74 65 | 70 73 20 6f 66 20 34 20 |s in ste|ps of 4 |
|00000ef0| 6c 69 6e 65 73 20 77 68 | 69 6c 73 74 20 74 68 65 |lines wh|ilst the|
|00000f00| 20 62 6f 74 74 6f 6d 20 | 69 6e 20 73 74 65 70 73 | bottom |in steps|
|00000f10| 0d 05 64 27 3b 6f 66 20 | 6f 6e 65 20 2d 20 61 6e |..d';of |one - an|
|00000f20| 64 20 74 68 65 72 65 27 | 73 20 79 61 20 72 65 66 |d there'|s ya ref|
|00000f30| 6c 65 63 74 69 6f 6e 0d | 05 6e 04 0d 05 78 11 2e |lection.|.n...x..|
|00000f40| 72 65 66 6c 65 63 74 5f | 6c 6f 6f 70 0d 05 82 04 |reflect_|loop....|
|00000f50| 0d 05 8c 3b 6c 64 6d 69 | 61 20 20 20 20 20 72 31 |...;ldmi|a r1|
|00000f60| 32 21 2c 20 20 20 20 20 | 7b 72 30 2d 72 39 7d 3a |2!, |{r0-r9}:|
|00000f70| 73 74 6d 69 61 20 20 20 | 20 20 72 31 34 21 2c 20 |stmia | r14!, |
|00000f80| 20 20 20 20 7b 72 30 2d | 72 39 7d 0d 05 96 3b 6c | {r0-|r9}...;l|
|00000f90| 64 6d 69 61 20 20 20 20 | 20 72 31 32 21 2c 20 20 |dmia | r12!, |
|00000fa0| 20 20 20 7b 72 30 2d 72 | 39 7d 3a 73 74 6d 69 61 | {r0-r|9}:stmia|
|00000fb0| 20 20 20 20 20 72 31 34 | 21 2c 20 20 20 20 20 7b | r14|!, {|
|00000fc0| 72 30 2d 72 39 7d 0d 05 | a0 3b 6c 64 6d 69 61 20 |r0-r9}..|.;ldmia |
|00000fd0| 20 20 20 20 72 31 32 21 | 2c 20 20 20 20 20 7b 72 | r12!|, {r|
|00000fe0| 30 2d 72 39 7d 3a 73 74 | 6d 69 61 20 20 20 20 20 |0-r9}:st|mia |
|00000ff0| 72 31 34 21 2c 20 20 20 | 20 20 7b 72 30 2d 72 39 |r14!, | {r0-r9|
|00001000| 7d 0d 05 aa 3b 6c 64 6d | 69 61 20 20 20 20 20 72 |}...;ldm|ia r|
|00001010| 31 32 21 2c 20 20 20 20 | 20 7b 72 30 2d 72 39 7d |12!, | {r0-r9}|
|00001020| 3a 73 74 6d 69 61 20 20 | 20 20 20 72 31 34 21 2c |:stmia | r14!,|
|00001030| 20 20 20 20 20 7b 72 30 | 2d 72 39 7d 0d 05 b4 3b | {r0|-r9}...;|
|00001040| 6c 64 6d 69 61 20 20 20 | 20 20 72 31 32 21 2c 20 |ldmia | r12!, |
|00001050| 20 20 20 20 7b 72 30 2d | 72 39 7d 3a 73 74 6d 69 | {r0-|r9}:stmi|
|00001060| 61 20 20 20 20 20 72 31 | 34 21 2c 20 20 20 20 20 |a r1|4!, |
|00001070| 7b 72 30 2d 72 39 7d 0d | 05 be 3b 6c 64 6d 69 61 |{r0-r9}.|..;ldmia|
|00001080| 20 20 20 20 20 72 31 32 | 21 2c 20 20 20 20 20 7b | r12|!, {|
|00001090| 72 30 2d 72 39 7d 3a 73 | 74 6d 69 61 20 20 20 20 |r0-r9}:s|tmia |
|000010a0| 20 72 31 34 21 2c 20 20 | 20 20 20 7b 72 30 2d 72 | r14!, | {r0-r|
|000010b0| 39 7d 0d 05 c8 3b 6c 64 | 6d 69 61 20 20 20 20 20 |9}...;ld|mia |
|000010c0| 72 31 32 21 2c 20 20 20 | 20 20 7b 72 30 2d 72 39 |r12!, | {r0-r9|
|000010d0| 7d 3a 73 74 6d 69 61 20 | 20 20 20 20 72 31 34 21 |}:stmia | r14!|
|000010e0| 2c 20 20 20 20 20 7b 72 | 30 2d 72 39 7d 0d 05 d2 |, {r|0-r9}...|
|000010f0| 3b 6c 64 6d 69 61 20 20 | 20 20 20 72 31 32 21 2c |;ldmia | r12!,|
|00001100| 20 20 20 20 20 7b 72 30 | 2d 72 39 7d 3a 73 74 6d | {r0|-r9}:stm|
|00001110| 69 61 20 20 20 20 20 72 | 31 34 21 2c 20 20 20 20 |ia r|14!, |
|00001120| 20 7b 72 30 2d 72 39 7d | 0d 05 dc 04 0d 05 e6 28 | {r0-r9}|.......(|
|00001130| 53 55 42 20 20 20 20 20 | 20 20 52 31 32 2c 20 20 |SUB | R12, |
|00001140| 20 20 20 20 52 31 32 2c | 20 20 20 20 20 20 23 34 | R12,| #4|
|00001150| 2a 33 32 30 0d 05 f0 04 | 0d 05 fa 24 73 75 62 73 |*320....|...$subs|
|00001160| 20 20 20 20 20 20 52 31 | 31 2c 20 20 20 20 20 20 | R1|1, |
|00001170| 52 31 31 2c 20 20 20 20 | 20 20 23 31 0d 06 04 1a |R11, | #1....|
|00001180| 62 67 65 20 20 20 20 20 | 20 20 72 65 66 6c 65 63 |bge | reflec|
|00001190| 74 5f 6c 6f 6f 70 0d 06 | 0e 04 0d 06 18 23 6c 64 |t_loop..|.....#ld|
|000011a0| 6d 66 64 20 20 20 20 20 | 28 73 70 29 21 2c 20 20 |mfd |(sp)!, |
|000011b0| 20 20 7b 72 30 2d 72 31 | 32 2c 70 63 7d 0d 06 22 | {r0-r1|2,pc}.."|
|000011c0| 04 0d 06 2c 04 0d 06 36 | 15 2e 6f 66 66 73 65 74 |...,...6|..offset|
|000011d0| 20 20 20 45 51 55 44 20 | 32 30 0d 06 40 1d 2e 73 | EQUD |20..@..s|
|000011e0| 74 61 72 74 6f 66 74 65 | 78 74 20 45 51 55 44 20 |tartofte|xt EQUD |
|000011f0| 6d 65 73 73 61 67 65 0d | 06 4a 1a 2e 74 65 78 74 |message.|.J..text|
|00001200| 70 74 72 20 20 45 51 55 | 44 20 6d 65 73 73 61 67 |ptr EQU|D messag|
|00001210| 65 0d 06 54 1b 2e 77 61 | 76 65 66 6f 72 6d 20 45 |e..T..wa|veform E|
|00001220| 51 55 44 20 77 61 76 65 | 64 61 74 61 0d 06 5e 17 |QUD wave|data..^.|
|00001230| 2e 66 6f 6e 74 70 74 72 | 20 20 45 51 55 44 20 66 |.fontptr| EQUD f|
|00001240| 6f 6e 74 0d 06 68 16 2e | 73 69 6e 65 6f 66 66 73 |ont..h..|sineoffs|
|00001250| 65 74 20 45 51 55 44 20 | 30 0d 06 72 04 0d 06 7c |et EQUD |0..r...||
|00001260| 0c 2e 63 74 72 6c 74 78 | 74 0d 06 86 4d 43 4d 50 |..ctrltx|t...MCMP|
|00001270| 20 20 20 20 20 20 20 63 | 68 61 72 2c 20 20 20 20 | c|har, |
|00001280| 20 23 31 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | #1 | |
|00001290| 20 20 20 20 20 3b 69 66 | 20 77 65 20 68 69 74 20 | ;if| we hit |
|000012a0| 74 68 65 20 65 6e 64 20 | 6f 66 20 74 68 65 20 6d |the end |of the m|
|000012b0| 65 73 73 61 67 65 0d 06 | 90 4b 4c 44 52 45 51 20 |essage..|.KLDREQ |
|000012c0| 20 20 20 20 74 70 2c 20 | 20 20 20 20 20 20 73 74 | tp, | st|
|000012d0| 61 72 74 6f 66 74 65 78 | 74 20 20 20 20 20 20 20 |artoftex|t |
|000012e0| 20 20 3b 74 68 65 6e 20 | 6c 6f 6f 70 20 69 74 20 | ;then |loop it |
|000012f0| 62 61 63 6b 20 74 6f 20 | 74 68 65 20 73 74 61 72 |back to |the star|
|00001300| 74 0d 06 9a 1f 53 54 52 | 45 51 20 20 20 20 20 74 |t....STR|EQ t|
|00001310| 70 2c 20 20 20 20 20 20 | 20 74 65 78 74 70 74 72 |p, | textptr|
|00001320| 0d 06 a4 1c 4d 4f 56 20 | 20 20 20 20 20 20 50 43 |....MOV | PC|
|00001330| 2c 20 20 20 20 20 20 20 | 6c 69 6e 6b 0d 06 ae 04 |, |link....|
|00001340| 0d 06 b8 0f 2e 73 63 72 | 6f 6c 6c 74 65 78 74 0d |.....scr|olltext.|
|00001350| 06 c2 20 53 54 4d 46 44 | 20 20 20 20 20 28 73 70 |.. STMFD| (sp|
|00001360| 29 21 2c 7b 52 30 2d 52 | 31 32 2c 52 31 34 7d 0d |)!,{R0-R|12,R14}.|
|00001370| 06 cc 46 4c 44 52 20 20 | 20 20 20 20 20 73 6f 66 |..FLDR | sof|
|00001380| 66 2c 20 20 20 20 20 73 | 69 6e 65 6f 66 66 73 65 |f, s|ineoffse|
|00001390| 74 20 20 20 20 20 20 20 | 20 20 20 3b 67 65 74 20 |t | ;get |
|000013a0| 6f 66 66 73 65 74 20 69 | 6e 74 6f 20 77 61 76 65 |offset i|nto wave|
|000013b0| 74 61 62 6c 65 0d 06 d6 | 47 41 44 44 20 20 20 20 |table...|GADD |
|000013c0| 20 20 20 73 6f 66 66 2c | 20 20 20 20 20 73 6f 66 | soff,| sof|
|000013d0| 66 2c 20 20 20 20 20 23 | 38 20 20 20 20 20 20 20 |f, #|8 |
|000013e0| 20 3b 69 6e 63 72 65 6d | 65 6e 74 20 77 61 76 65 | ;increm|ent wave|
|000013f0| 74 61 62 6c 65 20 6f 66 | 66 73 65 74 0d 06 e0 4a |table of|fset...J|
|00001400| 43 4d 50 20 20 20 20 20 | 20 20 73 6f 66 66 2c 20 |CMP | soff, |
|00001410| 20 20 20 20 23 37 32 30 | 20 20 20 20 20 20 3b 77 | #720| ;w|
|00001420| 65 27 76 65 20 67 6f 6e | 65 20 6f 6e 65 20 77 61 |e've gon|e one wa|
|00001430| 76 65 6c 65 6e 67 74 68 | 20 73 6f 20 77 72 61 70 |velength| so wrap|
|00001440| 20 72 6f 75 6e 64 0d 06 | ea 1a 4d 4f 56 47 45 20 | round..|..MOVGE |
|00001450| 20 20 20 20 73 6f 66 66 | 2c 20 20 20 20 20 23 30 | soff|, #0|
|00001460| 0d 06 f4 44 53 54 52 20 | 20 20 20 20 20 20 73 6f |...DSTR | so|
|00001470| 66 66 2c 20 20 20 20 20 | 73 69 6e 65 6f 66 66 73 |ff, |sineoffs|
|00001480| 65 74 20 20 20 20 20 20 | 20 20 20 20 3b 61 6e 64 |et | ;and|
|00001490| 20 73 74 6f 72 65 20 66 | 6f 72 20 6c 61 74 65 72 | store f|or later|
|000014a0| 20 75 73 65 0d 06 fe 04 | 0d 07 08 44 4c 44 52 20 | use....|...DLDR |
|000014b0| 20 20 20 20 20 20 74 70 | 2c 20 20 20 20 20 20 20 | tp|, |
|000014c0| 74 65 78 74 70 74 72 20 | 20 20 3b 70 6f 69 6e 74 |textptr | ;point|
|000014d0| 73 20 74 6f 20 66 69 72 | 73 74 20 6c 65 74 74 65 |s to fir|st lette|
|000014e0| 72 20 74 6f 20 64 69 73 | 70 6c 61 79 0d 07 12 39 |r to dis|play...9|
|000014f0| 4c 44 52 20 20 20 20 20 | 20 20 66 77 6f 72 6b 2c |LDR | fwork,|
|00001500| 20 20 20 20 66 6f 6e 74 | 70 74 72 20 20 20 3b 70 | font|ptr ;p|
|00001510| 6f 69 6e 74 73 20 74 6f | 20 62 61 73 65 20 6f 66 |oints to| base of|
|00001520| 20 66 6f 6e 74 0d 07 1c | 04 0d 07 26 3e 4c 44 52 | font...|...&>LDR|
|00001530| 20 20 20 20 20 20 20 66 | 70 2c 20 20 20 20 20 20 | f|p, |
|00001540| 20 77 61 76 65 66 6f 72 | 6d 20 20 3b 70 6f 69 6e | wavefor|m ;poin|
|00001550| 74 73 20 74 6f 20 62 61 | 73 65 20 6f 66 20 77 61 |ts to ba|se of wa|
|00001560| 76 65 74 61 62 6c 65 0d | 07 30 41 41 44 44 20 20 |vetable.|.0AADD |
|00001570| 20 20 20 20 20 66 70 2c | 20 20 20 20 20 20 20 66 | fp,| f|
|00001580| 70 2c 20 20 20 20 20 20 | 20 73 6f 66 66 20 20 20 |p, | soff |
|00001590| 20 20 20 3b 61 64 64 20 | 77 61 76 65 74 61 62 6c | ;add |wavetabl|
|000015a0| 65 20 6f 66 66 73 65 74 | 0d 07 3a 04 0d 07 44 3f |e offset|..:...D?|
|000015b0| 4c 44 52 20 20 20 20 20 | 20 20 78 70 2c 20 20 20 |LDR | xp, |
|000015c0| 20 20 20 20 6f 66 66 73 | 65 74 20 20 20 20 3b 64 | offs|et ;d|
|000015d0| 65 63 72 65 6d 65 6e 74 | 20 78 20 6f 66 66 73 65 |ecrement| x offse|
|000015e0| 74 20 6f 6e 20 73 63 72 | 65 65 6e 0d 07 4e 3b 53 |t on scr|een..N;S|
|000015f0| 55 42 53 20 20 20 20 20 | 20 78 70 2c 20 20 20 20 |UBS | xp, |
|00001600| 20 20 20 78 70 2c 20 20 | 20 20 20 20 20 23 34 20 | xp, | #4 |
|00001610| 20 20 20 20 20 20 20 3b | 62 79 20 66 6f 75 72 20 | ;|by four |
|00001620| 70 69 78 65 6c 73 0d 07 | 58 4b 4d 4f 56 4c 54 20 |pixels..|XKMOVLT |
|00001630| 20 20 20 20 78 70 2c 20 | 20 20 20 20 20 20 23 32 | xp, | #2|
|00001640| 30 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |0 | |
|00001650| 20 20 3b 69 66 20 77 65 | 27 76 65 20 67 6f 6e 65 | ;if we|'ve gone|
|00001660| 20 70 61 73 74 20 7a 65 | 72 6f 2c 20 72 65 73 65 | past ze|ro, rese|
|00001670| 74 0d 07 62 46 41 44 44 | 4c 54 20 20 20 20 20 74 |t..bFADD|LT t|
|00001680| 70 2c 20 20 20 20 20 20 | 20 74 70 2c 20 20 20 20 |p, | tp, |
|00001690| 20 20 20 23 31 20 20 20 | 20 20 20 20 20 3b 74 68 | #1 | ;th|
|000016a0| 65 6e 20 70 6c 6f 74 20 | 74 68 65 20 6e 65 78 74 |en plot |the next|
|000016b0| 20 6c 65 74 74 65 72 0d | 07 6c 39 53 54 52 20 20 | letter.|.l9STR |
|000016c0| 20 20 20 20 20 78 70 2c | 20 20 20 20 20 20 20 6f | xp,| o|
|000016d0| 66 66 73 65 74 20 20 20 | 20 3b 61 6e 64 20 73 74 |ffset | ;and st|
|000016e0| 6f 72 65 20 74 68 65 20 | 78 20 6f 66 66 73 65 74 |ore the |x offset|
|000016f0| 0d 07 76 04 0d 07 80 39 | 53 54 52 20 20 20 20 20 |..v....9|STR |
|00001700| 20 20 74 70 2c 20 20 20 | 20 20 20 20 74 65 78 74 | tp, | text|
|00001710| 70 74 72 20 20 20 3b 61 | 6e 64 20 73 74 6f 72 65 |ptr ;a|nd store|
|00001720| 20 74 68 65 20 74 65 78 | 74 20 70 74 72 0d 07 8a | the tex|t ptr...|
|00001730| 04 0d 07 94 0f 2e 73 63 | 74 65 78 74 6c 6f 6f 70 |......sc|textloop|
|00001740| 0d 07 9e 40 4c 44 52 42 | 20 20 20 20 20 20 63 68 |...@LDRB| ch|
|00001750| 61 72 2c 20 20 20 20 20 | 5b 74 70 5d 2c 20 20 20 |ar, |[tp], |
|00001760| 20 20 23 31 20 20 20 20 | 20 20 20 20 3b 6c 6f 61 | #1 | ;loa|
|00001770| 64 20 6e 65 78 74 20 63 | 68 61 72 61 63 74 65 72 |d next c|haracter|
|00001780| 0d 07 a8 04 0d 07 b2 24 | 41 44 52 20 20 20 20 20 |.......$|ADR |
|00001790| 20 20 52 31 34 2c 20 20 | 20 20 20 20 72 65 74 75 | R14, | retu|
|000017a0| 72 6e 69 6e 73 63 74 78 | 0d 07 bc 45 3b 69 6e 73 |rninsctx|...E;ins|
|000017b0| 74 65 61 64 20 6f 66 20 | 67 65 74 74 69 6e 67 20 |tead of |getting |
|000017c0| 74 68 65 20 43 50 55 20 | 74 6f 20 73 65 74 20 75 |the CPU |to set u|
|000017d0| 70 20 6c 69 6e 6b 20 66 | 6f 72 20 75 73 20 77 68 |p link f|or us wh|
|000017e0| 65 6e 20 77 65 20 64 6f | 20 61 20 42 4c 0d 07 c6 |en we do| a BL...|
|000017f0| 4c 3b 77 65 20 67 69 76 | 65 20 69 74 20 61 20 76 |L;we giv|e it a v|
|00001800| 61 6c 75 65 20 6e 6f 77 | 20 61 6e 64 20 73 6f 20 |alue now| and so |
|00001810| 74 68 65 20 72 6f 75 74 | 69 6e 65 73 20 77 69 6c |the rout|ines wil|
|00001820| 6c 20 67 6f 20 62 61 63 | 6b 20 74 6f 20 74 68 61 |l go bac|k to tha|
|00001830| 74 20 69 6e 73 74 65 61 | 64 0d 07 d0 04 0d 07 da |t instea|d.......|
|00001840| 45 43 4d 50 20 20 20 20 | 20 20 20 63 68 61 72 2c |ECMP | char,|
|00001850| 20 20 20 20 20 23 33 32 | 20 20 20 20 20 20 20 3b | #32| ;|
|00001860| 69 66 20 69 74 27 73 20 | 6e 6f 74 20 64 69 73 70 |if it's |not disp|
|00001870| 6c 61 79 61 62 6c 65 20 | 74 68 65 6e 20 64 6f 6e |layable |then don|
|00001880| 27 74 0d 07 e4 15 42 4c | 45 20 20 20 20 20 20 20 |'t....BL|E |
|00001890| 63 74 72 6c 74 78 74 0d | 07 ee 04 0d 07 f8 1d 43 |ctrltxt.|.......C|
|000018a0| 4d 50 20 20 20 20 20 20 | 20 63 68 61 72 2c 20 20 |MP | char, |
|000018b0| 20 20 20 23 97 22 5a 22 | 0d 08 02 1a 42 47 54 20 | #."Z"|....BGT |
|000018c0| 20 20 20 20 20 20 72 65 | 74 75 72 6e 69 6e 73 63 | re|turninsc|
|000018d0| 74 78 0d 08 0c 04 0d 08 | 16 4b 53 55 42 20 20 20 |tx......|.KSUB |
|000018e0| 20 20 20 20 63 68 61 72 | 2c 20 20 20 20 20 63 68 | char|, ch|
|000018f0| 61 72 2c 20 20 20 20 20 | 23 33 33 20 20 20 20 20 |ar, |#33 |
|00001900| 20 20 3b 61 64 6a 75 73 | 74 20 61 73 63 69 69 20 | ;adjus|t ascii |
|00001910| 63 6f 64 65 20 66 6f 72 | 20 6f 75 72 20 66 6f 6e |code for| our fon|
|00001920| 74 0d 08 20 38 42 4c 20 | 20 20 20 20 20 20 20 70 |t.. 8BL | p|
|00001930| 6c 6f 74 63 68 61 72 20 | 20 20 20 20 20 20 20 20 |lotchar | |
|00001940| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 3b 61 6e | | ;an|
|00001950| 64 20 70 6c 6f 74 20 69 | 74 0d 08 2a 04 0d 08 34 |d plot i|t..*...4|
|00001960| 11 2e 72 65 74 75 72 6e | 69 6e 73 63 74 78 0d 08 |..return|insctx..|
|00001970| 3e 04 0d 08 48 41 41 44 | 44 20 20 20 20 20 20 20 |>...HAAD|D |
|00001980| 78 70 2c 20 20 20 20 20 | 20 20 78 70 2c 20 20 20 |xp, | xp, |
|00001990| 20 20 20 20 23 32 34 20 | 20 20 20 20 20 20 3b 6d | #24 | ;m|
|000019a0| 6f 76 65 20 72 69 67 68 | 74 20 32 34 20 70 69 78 |ove righ|t 24 pix|
|000019b0| 65 6c 73 0d 08 52 4a 43 | 4d 50 20 20 20 20 20 20 |els..RJC|MP |
|000019c0| 20 78 70 2c 20 20 20 20 | 20 20 20 23 32 39 36 20 | xp, | #296 |
|000019d0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 3b | | ;|
|000019e0| 69 66 20 77 65 27 76 65 | 20 67 6f 6e 65 20 66 61 |if we've| gone fa|
|000019f0| 72 20 65 6e 6f 75 67 68 | 20 74 68 65 6e 0d 08 5c |r enough| then..\|
|00001a00| 3c 42 4c 54 20 20 20 20 | 20 20 20 73 63 74 65 78 |<BLT | sctex|
|00001a10| 74 6c 6f 6f 70 20 20 20 | 20 20 20 20 20 20 20 20 |tloop | |
|00001a20| 20 20 20 20 20 20 20 20 | 20 3b 73 74 6f 70 2c 20 | | ;stop, |
|00001a30| 65 6c 73 65 20 6c 6f 6f | 70 0d 08 66 04 0d 08 70 |else loo|p..f...p|
|00001a40| 45 4d 4f 56 20 20 20 20 | 20 20 20 78 70 2c 20 20 |EMOV | xp, |
|00001a50| 20 20 20 20 20 23 30 20 | 20 20 20 20 20 20 20 20 | #0 | |
|00001a60| 20 20 20 20 20 20 20 20 | 20 3b 62 6c 61 6e 6b 20 | | ;blank |
|00001a70| 6c 65 66 74 20 61 6e 64 | 20 72 69 67 68 74 20 6f |left and| right o|
|00001a80| 75 74 0d 08 7a 4b 42 4c | 20 20 20 20 20 20 20 20 |ut..zKBL| |
|00001a90| 70 6c 6f 74 73 70 61 63 | 65 20 20 20 20 20 20 20 |plotspac|e |
|00001aa0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 3b 74 | | ;t|
|00001ab0| 6f 20 73 74 6f 70 20 63 | 68 61 72 61 63 74 65 72 |o stop c|haracter|
|00001ac0| 73 20 66 6c 69 63 6b 69 | 6e 67 20 6f 6e 0d 08 84 |s flicki|ng on...|
|00001ad0| 34 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |4 | |
|00001ae0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001af0| 20 20 20 20 20 20 20 20 | 20 3b 61 6e 64 20 6f 66 | | ;and of|
|00001b00| 66 0d 08 8e 1f 4d 4f 56 | 20 20 20 20 20 20 20 78 |f....MOV| x|
|00001b10| 70 2c 20 20 20 20 20 20 | 20 23 33 32 30 2d 32 34 |p, | #320-24|
|00001b20| 0d 08 98 17 42 4c 20 20 | 20 20 20 20 20 20 70 6c |....BL | pl|
|00001b30| 6f 74 73 70 61 63 65 0d | 08 a2 04 0d 08 ac 1f 4c |otspace.|.......L|
|00001b40| 44 4d 46 44 20 20 20 20 | 20 28 73 70 29 21 2c 7b |DMFD | (sp)!,{|
|00001b50| 52 30 2d 52 31 32 2c 50 | 43 7d 0d 08 b6 04 0d 08 |R0-R12,P|C}......|
|00001b60| c0 0d 2e 70 6c 6f 74 63 | 68 61 72 0d 08 ca 24 53 |...plotc|har...$S|
|00001b70| 54 4d 46 44 20 20 20 20 | 20 28 73 70 29 21 2c 20 |TMFD | (sp)!, |
|00001b80| 20 20 20 7b 52 30 2d 52 | 31 32 2c 52 31 34 7d 0d | {R0-R|12,R14}.|
|00001b90| 08 d4 04 0d 08 de 39 3b | 63 61 6c 63 75 6c 61 74 |......9;|calculat|
|00001ba0| 65 20 6f 66 66 73 65 74 | 20 69 6e 74 6f 20 66 6f |e offset| into fo|
|00001bb0| 6e 74 20 66 6f 72 20 74 | 68 65 20 63 68 61 72 61 |nt for t|he chara|
|00001bc0| 63 74 65 72 20 77 65 20 | 6e 65 65 64 0d 08 e8 31 |cter we |need...1|
|00001bd0| 41 44 44 20 20 20 20 20 | 20 20 66 77 6f 72 6b 2c |ADD | fwork,|
|00001be0| 20 20 20 20 66 77 6f 72 | 6b 2c 20 20 20 20 63 68 | fwor|k, ch|
|00001bf0| 61 72 2c 20 20 20 20 20 | 41 53 4c 23 39 0d 08 f2 |ar, |ASL#9...|
|00001c00| 31 41 44 44 20 20 20 20 | 20 20 20 66 77 6f 72 6b |1ADD | fwork|
|00001c10| 2c 20 20 20 20 66 77 6f | 72 6b 2c 20 20 20 20 63 |, fwo|rk, c|
|00001c20| 68 61 72 2c 20 20 20 20 | 20 41 53 4c 23 36 0d 08 |har, | ASL#6..|
|00001c30| fc 34 4d 4f 56 20 20 20 | 20 20 20 20 52 31 34 2c |.4MOV | R14,|
|00001c40| 20 20 20 20 20 20 66 77 | 6f 72 6b 20 20 20 20 20 | fw|ork |
|00001c50| 3b 63 6f 70 79 20 69 74 | 20 69 6e 74 6f 20 6c 69 |;copy it| into li|
|00001c60| 6e 6b 0d 09 06 04 0d 09 | 10 4c 4c 44 52 42 20 20 |nk......|.LLDRB |
|00001c70| 20 20 20 20 68 65 69 67 | 68 74 2c 20 20 20 5b 66 | heig|ht, [f|
|00001c80| 70 2c 78 70 2c 41 53 52 | 23 32 5d 20 20 3b 67 65 |p,xp,ASR|#2] ;ge|
|00001c90| 74 20 68 65 69 67 68 74 | 20 6f 66 20 77 61 76 65 |t height| of wave|
|00001ca0| 66 6f 72 6d 20 61 74 20 | 74 68 69 73 20 70 6f 69 |form at |this poi|
|00001cb0| 6e 74 0d 09 1a 04 0d 09 | 24 42 41 44 44 20 20 20 |nt......|$BADD |
|00001cc0| 20 20 20 20 52 31 32 2c | 20 20 20 20 20 20 52 31 | R12,| R1|
|00001cd0| 32 2c 20 20 20 20 20 20 | 78 70 20 3b 61 64 64 72 |2, |xp ;addr|
|00001ce0| 65 73 73 20 3d 20 73 63 | 72 65 65 6e 62 61 73 65 |ess = sc|reenbase|
|00001cf0| 20 2b 20 78 20 2e 2e 2e | 0d 09 2e 3f 41 44 44 20 | + x ...|...?ADD |
|00001d00| 20 20 20 20 20 20 52 31 | 32 2c 20 20 20 20 20 20 | R1|2, |
|00001d10| 52 31 32 2c 20 20 20 20 | 20 20 68 65 69 67 68 74 |R12, | height|
|00001d20| 2c 20 20 20 41 53 4c 23 | 38 20 3b 20 2b 20 28 79 |, ASL#|8 ; + (y|
|00001d30| 20 2a 20 33 32 30 29 0d | 09 38 31 41 44 44 20 20 | * 320).|.81ADD |
|00001d40| 20 20 20 20 20 52 31 32 | 2c 20 20 20 20 20 20 52 | R12|, R|
|00001d50| 31 32 2c 20 20 20 20 20 | 20 68 65 69 67 68 74 2c |12, | height,|
|00001d60| 20 20 20 41 53 4c 23 36 | 0d 09 42 04 0d 09 4c 4c | ASL#6|..B...LL|
|00001d70| 3b 5b 20 28 79 20 3c 3c | 20 38 29 2b 28 79 20 3c |;[ (y <<| 8)+(y <|
|00001d80| 3c 20 36 29 20 3d 20 79 | 2a 36 34 20 2b 20 79 2a |< 6) = y|*64 + y*|
|00001d90| 32 35 36 20 3d 20 79 2a | 33 32 30 20 69 6e 20 63 |256 = y*|320 in c|
|00001da0| 61 73 65 20 79 6f 75 20 | 77 65 72 65 20 77 6f 6e |ase you |were won|
|00001db0| 64 65 72 69 6e 67 20 5d | 0d 09 56 04 0d 09 60 2e |dering ]|..V...`.|
|00001dc0| a4 73 74 6f 72 65 63 68 | 61 72 28 32 34 29 20 20 |.storech|ar(24) |
|00001dd0| 20 20 20 3b 70 6c 6f 74 | 20 32 34 20 6c 69 6e 65 | ;plot| 24 line|
|00001de0| 73 20 6f 66 20 73 74 75 | 66 66 0d 09 6a 04 0d 09 |s of stu|ff..j...|
|00001df0| 74 33 4c 44 4d 46 44 20 | 20 20 20 20 28 73 70 29 |t3LDMFD | (sp)|
|00001e00| 21 2c 20 20 20 20 7b 52 | 30 2d 52 31 32 2c 50 43 |!, {R|0-R12,PC|
|00001e10| 7d 20 20 20 20 20 20 20 | 20 20 3b 72 65 74 75 72 |} | ;retur|
|00001e20| 6e 0d 09 7e 04 0d 09 88 | 0e 2e 70 6c 6f 74 73 70 |n..~....|..plotsp|
|00001e30| 61 63 65 0d 09 92 24 53 | 54 4d 46 44 20 20 20 20 |ace...$S|TMFD |
|00001e40| 20 28 73 70 29 21 2c 20 | 20 20 20 7b 52 30 2d 52 | (sp)!, | {R0-R|
|00001e50| 31 32 2c 52 31 34 7d 0d | 09 9c 04 0d 09 a6 41 3b |12,R14}.|......A;|
|00001e60| 73 61 6d 65 20 61 73 20 | 61 62 6f 76 65 2c 20 62 |same as |above, b|
|00001e70| 75 74 20 66 6f 72 20 73 | 70 61 63 65 20 6f 6e 6c |ut for s|pace onl|
|00001e80| 79 20 28 32 38 20 70 69 | 78 65 6c 73 20 68 69 67 |y (28 pi|xels hig|
|00001e90| 68 20 74 68 69 73 20 74 | 69 6d 65 29 0d 09 b0 04 |h this t|ime)....|
|00001ea0| 0d 09 ba 45 53 55 42 20 | 20 20 20 20 20 20 66 77 |...ESUB | fw|
|00001eb0| 6f 72 6b 2c 20 20 20 20 | 66 77 6f 72 6b 2c 20 20 |ork, |fwork, |
|00001ec0| 20 20 23 32 34 2a 32 38 | 20 20 20 20 3b 70 6f 69 | #24*28| ;poi|
|00001ed0| 6e 74 20 74 6f 20 62 6c | 61 6e 6b 20 63 68 61 72 |nt to bl|ank char|
|00001ee0| 61 63 74 65 72 0d 09 c4 | 1d 4d 4f 56 20 20 20 20 |acter...|.MOV |
|00001ef0| 20 20 20 52 31 34 2c 20 | 20 20 20 20 20 66 77 6f | R14, | fwo|
|00001f00| 72 6b 0d 09 ce 25 4c 44 | 52 42 20 20 20 20 20 20 |rk...%LD|RB |
|00001f10| 68 65 69 67 68 74 2c 20 | 20 20 5b 66 70 2c 78 70 |height, | [fp,xp|
|00001f20| 2c 41 53 52 23 32 5d 0d | 09 d8 24 41 44 44 20 20 |,ASR#2].|..$ADD |
|00001f30| 20 20 20 20 20 52 31 32 | 2c 20 20 20 20 20 20 52 | R12|, R|
|00001f40| 31 32 2c 20 20 20 20 20 | 20 78 70 0d 09 e2 31 41 |12, | xp...1A|
|00001f50| 44 44 20 20 20 20 20 20 | 20 52 31 32 2c 20 20 20 |DD | R12, |
|00001f60| 20 20 20 52 31 32 2c 20 | 20 20 20 20 20 68 65 69 | R12, | hei|
|00001f70| 67 68 74 2c 20 20 20 41 | 53 4c 23 38 0d 09 ec 31 |ght, A|SL#8...1|
|00001f80| 41 44 44 20 20 20 20 20 | 20 20 52 31 32 2c 20 20 |ADD | R12, |
|00001f90| 20 20 20 20 52 31 32 2c | 20 20 20 20 20 20 68 65 | R12,| he|
|00001fa0| 69 67 68 74 2c 20 20 20 | 41 53 4c 23 36 0d 09 f6 |ight, |ASL#6...|
|00001fb0| 04 0d 0a 00 26 53 55 42 | 20 20 20 20 20 20 20 52 |....&SUB| R|
|00001fc0| 31 32 2c 20 20 20 20 20 | 20 52 31 32 2c 20 20 20 |12, | R12, |
|00001fd0| 20 20 20 23 36 34 30 0d | 0a 0a 04 0d 0a 14 12 a4 | #640.|........|
|00001fe0| 73 74 6f 72 65 63 68 61 | 72 28 32 38 29 0d 0a 1e |storecha|r(28)...|
|00001ff0| 04 0d 0a 28 23 4c 44 4d | 46 44 20 20 20 20 20 28 |...(#LDM|FD (|
|00002000| 73 70 29 21 2c 20 20 20 | 20 7b 52 30 2d 52 31 32 |sp)!, | {R0-R12|
|00002010| 2c 50 43 7d 0d 0a 32 04 | 0d 0a 3c 0d 2e 77 61 76 |,PC}..2.|..<..wav|
|00002020| 65 64 61 74 61 0d 0a 46 | 14 5d 3a e3 20 58 25 3d |edata..F|.]:. X%=|
|00002030| 31 20 b8 20 33 36 30 2a | 34 0d 0a 50 16 48 25 3d |1 . 360*|4..P.H%=|
|00002040| 31 30 30 2b 33 32 2a b5 | 28 b2 28 58 25 29 29 0d |100+32*.|(.(X%)).|
|00002050| 0a 5a 0d 5b 4f 50 54 20 | 70 61 73 73 0d 0a 64 0b |.Z.[OPT |pass..d.|
|00002060| 45 51 55 42 20 48 25 0d | 0a 6e 09 5d 3a ed 58 25 |EQUB H%.|.n.]:.X%|
|00002070| 0d 0a 78 0d 5b 4f 50 54 | 20 70 61 73 73 0d 0a 82 |..x.[OPT| pass...|
|00002080| 04 0d 0a 8c 0c 2e 6d 65 | 73 73 61 67 65 0d 0a 96 |......me|ssage...|
|00002090| 16 5d 3a 47 25 3d 8e 20 | 22 53 43 52 4f 4c 4c 54 |.]:G%=. |"SCROLLT|
|000020a0| 58 54 22 0d 0a a0 0c 50 | 25 2b 3d a2 23 47 25 0d |XT"....P|%+=.#G%.|
|000020b0| 0a aa 08 d9 23 47 25 0d | 0a b4 0d 5b 4f 50 54 20 |....#G%.|...[OPT |
|000020c0| 70 61 73 73 0d 0a be 24 | 45 51 55 42 20 31 20 20 |pass...$|EQUB 1 |
|000020d0| 20 20 20 3b 20 73 63 72 | 6f 6c 6c 74 65 78 74 20 | ; scr|olltext |
|000020e0| 65 6e 64 20 66 6c 61 67 | 0d 0a c8 09 41 4c 49 47 |end flag|....ALIG|
|000020f0| 4e 0d 0a d2 04 0d 0a dc | 38 2e 62 6c 61 63 6b 20 |N.......|8.black |
|00002100| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002110| 20 20 20 20 20 20 20 3b | 63 6c 65 61 72 20 73 63 | ;|clear sc|
|00002120| 72 65 65 6e 20 74 6f 20 | 62 6c 61 63 6b 0d 0a e6 |reen to |black...|
|00002130| 1f 45 51 55 44 20 30 3a | 45 51 55 44 20 30 3a 45 |.EQUD 0:|EQUD 0:E|
|00002140| 51 55 44 20 30 3a 45 51 | 55 44 20 30 0d 0a f0 1f |QUD 0:EQ|UD 0....|
|00002150| 45 51 55 44 20 30 3a 45 | 51 55 44 20 30 3a 45 51 |EQUD 0:E|QUD 0:EQ|
|00002160| 55 44 20 30 3a 45 51 55 | 44 20 30 0d 0a fa 1f 45 |UD 0:EQU|D 0....E|
|00002170| 51 55 44 20 30 3a 45 51 | 55 44 20 30 3a 45 51 55 |QUD 0:EQ|UD 0:EQU|
|00002180| 44 20 30 3a 45 51 55 44 | 20 30 0d 0b 04 04 0d 0b |D 0:EQUD| 0......|
|00002190| 0e 43 2e 63 6c 72 73 63 | 72 20 20 20 3b 20 61 20 |.C.clrsc|r ; a |
|000021a0| 63 6c 65 61 72 20 73 63 | 72 65 65 6e 20 72 6f 75 |clear sc|reen rou|
|000021b0| 74 69 6e 65 20 64 6f 65 | 73 6e 27 74 20 6e 65 65 |tine doe|sn't nee|
|000021c0| 64 20 74 6f 20 62 65 20 | 63 6f 6d 6d 65 6e 74 65 |d to be |commente|
|000021d0| 64 0d 0b 18 24 53 54 4d | 46 44 20 20 20 20 20 28 |d...$STM|FD (|
|000021e0| 73 70 29 21 2c 20 20 20 | 20 7b 52 30 2d 52 31 32 |sp)!, | {R0-R12|
|000021f0| 2c 52 31 34 7d 0d 0b 22 | 1d 41 44 52 20 20 20 20 |,R14}.."|.ADR |
|00002200| 20 20 20 52 31 34 2c 20 | 20 20 20 20 20 62 6c 61 | R14, | bla|
|00002210| 63 6b 0d 0b 2c 20 4c 44 | 4d 49 41 20 20 20 20 20 |ck.., LD|MIA |
|00002220| 52 31 34 2c 20 20 20 20 | 20 20 7b 52 30 2d 52 31 |R14, | {R0-R1|
|00002230| 31 7d 0d 0b 36 04 0d 0b | 40 1c 4d 4f 56 20 20 20 |1}..6...|@.MOV |
|00002240| 20 20 20 20 52 31 34 2c | 20 20 20 20 20 20 23 31 | R14,| #1|
|00002250| 32 30 0d 0b 4a 2b 41 44 | 44 20 20 20 20 20 20 20 |20..J+AD|D |
|00002260| 52 31 32 2c 20 20 20 20 | 20 20 52 31 32 2c 20 20 |R12, | R12, |
|00002270| 20 20 20 20 23 28 33 32 | 30 2a 34 38 29 0d 0b 54 | #(32|0*48)..T|
|00002280| 0f 2e 63 6c 72 73 63 72 | 6c 6f 6f 70 0d 0b 5e 3d |..clrscr|loop..^=|
|00002290| 53 54 4d 49 41 20 20 20 | 20 20 52 31 32 21 2c 20 |STMIA | R12!, |
|000022a0| 20 20 20 20 7b 52 30 2d | 52 31 31 7d 3a 53 54 4d | {R0-|R11}:STM|
|000022b0| 49 41 20 20 20 20 20 52 | 31 32 21 2c 20 20 20 20 |IA R|12!, |
|000022c0| 20 7b 52 30 2d 52 31 31 | 7d 0d 0b 68 3d 53 54 4d | {R0-R11|}..h=STM|
|000022d0| 49 41 20 20 20 20 20 52 | 31 32 21 2c 20 20 20 20 |IA R|12!, |
|000022e0| 20 7b 52 30 2d 52 31 31 | 7d 3a 53 54 4d 49 41 20 | {R0-R11|}:STMIA |
|000022f0| 20 20 20 20 52 31 32 21 | 2c 20 20 20 20 20 7b 52 | R12!|, {R|
|00002300| 30 2d 52 31 31 7d 0d 0b | 72 3d 53 54 4d 49 41 20 |0-R11}..|r=STMIA |
|00002310| 20 20 20 20 52 31 32 21 | 2c 20 20 20 20 20 7b 52 | R12!|, {R|
|00002320| 30 2d 52 31 31 7d 3a 53 | 54 4d 49 41 20 20 20 20 |0-R11}:S|TMIA |
|00002330| 20 52 31 32 21 2c 20 20 | 20 20 20 7b 52 30 2d 52 | R12!, | {R0-R|
|00002340| 31 31 7d 0d 0b 7c 3d 53 | 54 4d 49 41 20 20 20 20 |11}..|=S|TMIA |
|00002350| 20 52 31 32 21 2c 20 20 | 20 20 20 7b 52 30 2d 52 | R12!, | {R0-R|
|00002360| 31 31 7d 3a 53 54 4d 49 | 41 20 20 20 20 20 52 31 |11}:STMI|A R1|
|00002370| 32 21 2c 20 20 20 20 20 | 7b 52 30 2d 52 31 31 7d |2!, |{R0-R11}|
|00002380| 0d 0b 86 3d 53 54 4d 49 | 41 20 20 20 20 20 52 31 |...=STMI|A R1|
|00002390| 32 21 2c 20 20 20 20 20 | 7b 52 30 2d 52 31 31 7d |2!, |{R0-R11}|
|000023a0| 3a 53 54 4d 49 41 20 20 | 20 20 20 52 31 32 21 2c |:STMIA | R12!,|
|000023b0| 20 20 20 20 20 7b 52 30 | 2d 52 31 31 7d 0d 0b 90 | {R0|-R11}...|
|000023c0| 3d 53 54 4d 49 41 20 20 | 20 20 20 52 31 32 21 2c |=STMIA | R12!,|
|000023d0| 20 20 20 20 20 7b 52 30 | 2d 52 31 31 7d 3a 53 54 | {R0|-R11}:ST|
|000023e0| 4d 49 41 20 20 20 20 20 | 52 31 32 21 2c 20 20 20 |MIA |R12!, |
|000023f0| 20 20 7b 52 30 2d 52 31 | 31 7d 0d 0b 9a 3d 53 54 | {R0-R1|1}...=ST|
|00002400| 4d 49 41 20 20 20 20 20 | 52 31 32 21 2c 20 20 20 |MIA |R12!, |
|00002410| 20 20 7b 52 30 2d 52 31 | 31 7d 3a 53 54 4d 49 41 | {R0-R1|1}:STMIA|
|00002420| 20 20 20 20 20 52 31 32 | 21 2c 20 20 20 20 20 7b | R12|!, {|
|00002430| 52 30 2d 52 31 31 7d 0d | 0b a4 3d 53 54 4d 49 41 |R0-R11}.|..=STMIA|
|00002440| 20 20 20 20 20 52 31 32 | 21 2c 20 20 20 20 20 7b | R12|!, {|
|00002450| 52 30 2d 52 31 31 7d 3a | 53 54 4d 49 41 20 20 20 |R0-R11}:|STMIA |
|00002460| 20 20 52 31 32 21 2c 20 | 20 20 20 20 7b 52 30 2d | R12!, | {R0-|
|00002470| 52 31 31 7d 0d 0b ae 3d | 53 54 4d 49 41 20 20 20 |R11}...=|STMIA |
|00002480| 20 20 52 31 32 21 2c 20 | 20 20 20 20 7b 52 30 2d | R12!, | {R0-|
|00002490| 52 31 31 7d 3a 53 54 4d | 49 41 20 20 20 20 20 52 |R11}:STM|IA R|
|000024a0| 31 32 21 2c 20 20 20 20 | 20 7b 52 30 2d 52 31 31 |12!, | {R0-R11|
|000024b0| 7d 0d 0b b8 3d 53 54 4d | 49 41 20 20 20 20 20 52 |}...=STM|IA R|
|000024c0| 31 32 21 2c 20 20 20 20 | 20 7b 52 30 2d 52 31 31 |12!, | {R0-R11|
|000024d0| 7d 3a 53 54 4d 49 41 20 | 20 20 20 20 52 31 32 21 |}:STMIA | R12!|
|000024e0| 2c 20 20 20 20 20 7b 52 | 30 2d 52 31 31 7d 0d 0b |, {R|0-R11}..|
|000024f0| c2 04 0d 0b cc 24 53 55 | 42 53 20 20 20 20 20 20 |.....$SU|BS |
|00002500| 52 31 34 2c 20 20 20 20 | 20 20 52 31 34 2c 20 20 |R14, | R14, |
|00002510| 20 20 20 20 23 33 0d 0b | d6 18 42 47 54 20 20 20 | #3..|..BGT |
|00002520| 20 20 20 20 63 6c 72 73 | 63 72 6c 6f 6f 70 0d 0b | clrs|crloop..|
|00002530| e0 23 4c 44 4d 46 44 20 | 20 20 20 20 28 73 70 29 |.#LDMFD | (sp)|
|00002540| 21 2c 20 20 20 20 7b 52 | 30 2d 52 31 32 2c 50 43 |!, {R|0-R12,PC|
|00002550| 7d 0d 0b ea 04 0d 0b f4 | 1f 3b 64 61 74 61 20 66 |}.......|.;data f|
|00002560| 6f 72 20 63 68 61 72 20 | 33 32 2c 20 69 65 20 73 |or char |32, ie s|
|00002570| 70 61 63 65 0d 0b fe 2a | 45 51 55 53 20 c4 39 36 |pace...*|EQUS .96|
|00002580| 2c bd 30 29 3a 45 51 55 | 53 20 c4 39 36 2c bd 30 |,.0):EQU|S .96,.0|
|00002590| 29 3a 45 51 55 53 20 c4 | 39 36 2c bd 30 29 0d 0c |):EQUS .|96,.0)..|
|000025a0| 08 2a 45 51 55 53 20 c4 | 39 36 2c bd 30 29 3a 45 |.*EQUS .|96,.0):E|
|000025b0| 51 55 53 20 c4 39 36 2c | bd 30 29 3a 45 51 55 53 |QUS .96,|.0):EQUS|
|000025c0| 20 c4 39 36 2c bd 30 29 | 0d 0c 12 10 45 51 55 53 | .96,.0)|....EQUS|
|000025d0| 20 c4 39 36 2c bd 30 29 | 0d 0c 1c 09 2e 66 6f 6e | .96,.0)|.....fon|
|000025e0| 74 0d 0c 26 14 5d 3a 47 | 25 3d 8e 20 22 72 61 77 |t..&.]:G|%=. "raw|
|000025f0| 66 6f 6e 74 22 0d 0c 30 | 0c 50 25 2b 3d a2 23 47 |font"..0|.P%+=.#G|
|00002600| 25 0d 0c 3a 08 d9 23 47 | 25 0d 0c 44 0d 5b 4f 50 |%..:..#G|%..D.[OP|
|00002610| 54 20 70 61 73 73 0d 0c | 4e 09 41 4c 49 47 4e 0d |T pass..|N.ALIGN.|
|00002620| 0c 58 04 0d 0c 62 40 2e | 73 74 61 72 73 20 20 20 |.X...b@.|stars |
|00002630| 20 3b 73 74 61 72 73 20 | 72 6f 75 74 69 6e 65 73 | ;stars |routines|
|00002640| 20 61 72 65 20 74 77 6f | 2d 61 2d 70 65 6e 6e 79 | are two|-a-penny|
|00002650| 20 73 6f 20 64 6f 6e 27 | 74 20 62 6f 74 68 65 72 | so don'|t bother|
|00002660| 2e 2e 2e 0d 0c 6c 24 53 | 54 4d 46 44 20 20 20 20 |.....l$S|TMFD |
|00002670| 20 28 73 70 29 21 2c 20 | 20 20 20 7b 52 30 2d 52 | (sp)!, | {R0-R|
|00002680| 31 32 2c 52 31 34 7d 0d | 0c 76 1c 4d 4f 56 20 20 |12,R14}.|.v.MOV |
|00002690| 20 20 20 20 20 52 31 31 | 2c 20 20 20 20 20 20 23 | R11|, #|
|000026a0| 31 31 39 0d 0c 80 21 41 | 44 52 20 20 20 20 20 20 |119...!A|DR |
|000026b0| 20 52 31 30 2c 20 20 20 | 20 20 20 73 74 61 72 74 | R10, | start|
|000026c0| 61 62 6c 65 0d 0c 8a 04 | 0d 0c 94 0d 2e 73 74 61 |able....|.....sta|
|000026d0| 72 6c 6f 6f 70 0d 0c 9e | 24 80 20 20 20 20 20 20 |rloop...|$. |
|000026e0| 20 52 39 2c 20 20 20 20 | 20 20 20 52 31 31 2c 20 | R9, | R11, |
|000026f0| 20 20 20 20 20 23 25 31 | 31 0d 0c a8 27 4c 44 52 | #%1|1...'LDR|
|00002700| 20 20 20 20 20 20 20 52 | 38 2c 20 20 20 20 20 20 | R|8, |
|00002710| 20 5b 52 31 30 2c 52 31 | 31 2c 41 53 4c 23 32 5d | [R10,R1|1,ASL#2]|
|00002720| 0d 0c b2 24 41 44 44 20 | 20 20 20 20 20 20 52 38 |...$ADD | R8|
|00002730| 2c 20 20 20 20 20 20 20 | 52 38 2c 20 20 20 20 20 |, |R8, |
|00002740| 20 20 52 39 0d 0c bc 24 | 41 44 44 20 20 20 20 20 | R9...$|ADD |
|00002750| 20 20 52 38 2c 20 20 20 | 20 20 20 20 52 38 2c 20 | R8, | R8, |
|00002760| 20 20 20 20 20 20 23 31 | 0d 0c c6 1c 43 4d 50 20 | #1|....CMP |
|00002770| 20 20 20 20 20 20 52 38 | 2c 20 20 20 20 20 20 20 | R8|, |
|00002780| 23 33 32 30 0d 0c d0 26 | 53 55 42 47 45 20 20 20 |#320...&|SUBGE |
|00002790| 20 20 52 38 2c 20 20 20 | 20 20 20 20 52 38 2c 20 | R8, | R8, |
|000027a0| 20 20 20 20 20 20 23 33 | 32 30 0d 0c da 27 53 54 | #3|20...'ST|
|000027b0| 52 20 20 20 20 20 20 20 | 52 38 2c 20 20 20 20 20 |R |R8, |
|000027c0| 20 20 5b 52 31 30 2c 52 | 31 31 2c 41 53 4c 23 32 | [R10,R|11,ASL#2|
|000027d0| 5d 0d 0c e4 04 0d 0c ee | 24 41 44 44 20 20 20 20 |].......|$ADD |
|000027e0| 20 20 20 52 37 2c 20 20 | 20 20 20 20 20 52 31 32 | R7, | R12|
|000027f0| 2c 20 20 20 20 20 20 52 | 38 0d 0c f8 29 41 44 44 |, R|8...)ADD|
|00002800| 20 20 20 20 20 20 20 52 | 37 2c 20 20 20 20 20 20 | R|7, |
|00002810| 20 52 37 2c 20 20 20 20 | 20 20 20 23 34 38 2a 33 | R7, | #48*3|
|00002820| 32 30 0d 0d 02 31 41 44 | 44 20 20 20 20 20 20 20 |20...1AD|D |
|00002830| 52 37 2c 20 20 20 20 20 | 20 20 52 37 2c 20 20 20 |R7, | R7, |
|00002840| 20 20 20 20 52 31 31 2c | 20 20 20 20 20 20 41 53 | R11,| AS|
|00002850| 4c 23 38 0d 0d 0c 31 41 | 44 44 20 20 20 20 20 20 |L#8...1A|DD |
|00002860| 20 52 37 2c 20 20 20 20 | 20 20 20 52 37 2c 20 20 | R7, | R7, |
|00002870| 20 20 20 20 20 52 31 31 | 2c 20 20 20 20 20 20 41 | R11|, A|
|00002880| 53 4c 23 36 0d 0d 16 04 | 0d 0d 20 26 41 44 44 20 |SL#6....|.. &ADD |
|00002890| 20 20 20 20 20 20 52 36 | 2c 20 20 20 20 20 20 20 | R6|, |
|000028a0| 52 39 2c 20 20 20 20 20 | 20 20 23 32 35 32 0d 0d |R9, | #252..|
|000028b0| 2a 1c 53 54 52 42 20 20 | 20 20 20 20 52 36 2c 20 |*.STRB | R6, |
|000028c0| 20 20 20 20 20 20 5b 52 | 37 5d 0d 0d 34 04 0d 0d | [R|7]..4...|
|000028d0| 3e 24 53 55 42 53 20 20 | 20 20 20 20 52 31 31 2c |>$SUBS | R11,|
|000028e0| 20 20 20 20 20 20 52 31 | 31 2c 20 20 20 20 20 20 | R1|1, |
|000028f0| 23 31 0d 0d 48 16 42 47 | 54 20 20 20 20 20 20 20 |#1..H.BG|T |
|00002900| 73 74 61 72 6c 6f 6f 70 | 0d 0d 52 04 0d 0d 5c 23 |starloop|..R...\#|
|00002910| 4c 44 4d 46 44 20 20 20 | 20 20 28 73 70 29 21 2c |LDMFD | (sp)!,|
|00002920| 20 20 20 20 7b 52 30 2d | 52 31 32 2c 50 43 7d 0d | {R0-|R12,PC}.|
|00002930| 0d 66 04 0d 0d 70 0e 2e | 73 74 61 72 74 61 62 6c |.f...p..|startabl|
|00002940| 65 0d 0d 7a 11 5d e3 20 | 4b 25 3d 31 20 b8 20 31 |e..z.]. |K%=1 . 1|
|00002950| 32 30 0d 0d 84 0d 5b 4f | 50 54 20 70 61 73 73 0d |20....[O|PT pass.|
|00002960| 0d 8e 0f 45 51 55 44 20 | b3 28 33 32 30 29 0d 0d |...EQUD |.(320)..|
|00002970| 98 06 5d ed 0d 0d a2 0d | 5b 4f 50 54 20 70 61 73 |..].....|[OPT pas|
|00002980| 73 0d 0d ac 04 0d 0d b6 | 08 2e 65 6e 64 0d 0d c0 |s.......|..end...|
|00002990| 05 5d 0d 0d ca 09 ed 70 | 61 73 73 0d 0d d4 1e ff |.].....p|ass.....|
|000029a0| 20 28 22 4c 6f 61 64 20 | 72 61 77 66 6f 6e 74 20 | ("Load |rawfont |
|000029b0| 22 2b c3 7e 66 6f 6e 74 | 29 0d 0d de 23 ff 20 28 |"+.~font|)...#. (|
|000029c0| 22 4c 6f 61 64 20 53 43 | 52 4f 4c 4c 54 58 54 20 |"Load SC|ROLLTXT |
|000029d0| 22 2b c3 7e 6d 65 73 73 | 61 67 65 29 0d 0d e8 2a |"+.~mess|age)...*|
|000029e0| e8 20 22 53 61 76 65 20 | 63 6f 64 65 20 69 6e 20 |. "Save |code in |
|000029f0| 63 75 72 72 65 6e 74 20 | 64 69 72 65 63 74 6f 72 |current |director|
|00002a00| 79 20 22 3b 41 24 0d 0d | f2 17 e7 20 41 24 3d 22 |y ";A$..|... A$="|
|00002a10| 79 22 20 84 20 41 24 3d | 22 59 22 20 8c 0d 0d fc |y" . A$=|"Y" ....|
|00002a20| 3b ff 20 28 22 53 41 56 | 45 20 63 6f 64 65 20 22 |;. ("SAV|E code "|
|00002a30| 2b c3 7e 69 6e 69 74 2b | 22 20 22 2b c3 7e 65 6e |+.~init+|" "+.~en|
|00002a40| 64 2b 22 20 22 2b c3 7e | 63 6f 64 65 2b 22 20 22 |d+" "+.~|code+" "|
|00002a50| 2b c3 7e 63 6f 64 65 29 | 0d 0e 06 05 cd 0d 0e 10 |+.~code)|........|
|00002a60| 05 e1 0d 0e 1a 05 3a 0d | 0e 24 16 dd 20 a4 73 74 |......:.|.$.. .st|
|00002a70| 6f 72 65 63 68 61 72 28 | 72 6f 77 73 29 0d 0e 2e |orechar(|rows)...|
|00002a80| 11 e3 20 41 25 3d 31 20 | b8 20 72 6f 77 73 0d 0e |.. A%=1 |. rows..|
|00002a90| 38 0d 5b 4f 50 54 20 70 | 61 73 73 0d 0e 42 36 4c |8.[OPT p|ass..B6L|
|00002aa0| 44 4d 49 41 20 20 20 20 | 20 52 31 34 21 2c 20 20 |DMIA | R14!, |
|00002ab0| 20 20 20 7b 52 30 2d 52 | 33 2c 52 39 2c 52 31 30 | {R0-R|3,R9,R10|
|00002ac0| 7d 20 3b 6c 6f 61 64 20 | 73 6f 6d 65 20 64 61 74 |} ;load |some dat|
|00002ad0| 61 0d 0e 4c 30 53 54 4d | 49 41 20 20 20 20 20 52 |a..L0STM|IA R|
|00002ae0| 31 32 2c 20 20 20 20 20 | 20 7b 52 30 2d 52 33 2c |12, | {R0-R3,|
|00002af0| 52 39 2c 52 31 30 7d 20 | 3b 73 74 6f 72 65 20 69 |R9,R10} |;store i|
|00002b00| 74 0d 0e 56 3c 41 44 44 | 20 20 20 20 20 20 20 52 |t..V<ADD| R|
|00002b10| 31 32 2c 20 20 20 20 20 | 20 52 31 32 2c 20 20 20 |12, | R12, |
|00002b20| 20 20 20 23 33 32 30 20 | 3b 61 6e 64 20 64 6f 20 | #320 |;and do |
|00002b30| 74 68 65 20 6e 65 78 74 | 20 6c 69 6e 65 0d 0e 60 |the next| line..`|
|00002b40| 05 5d 0d 0e 6a 07 ed 41 | 25 0d 0e 74 07 3d 22 22 |.]..j..A|%..t.=""|
|00002b50| 0d ff | |.. | |
+--------+-------------------------+-------------------------+--------+--------+
